Construct takes two arguments. By performing a construct argument 1 is placed before argument 3
and the result is not flattened. This has the effect of creating multi-dimensional arrays. Notice
that the length reflects the number of elements with a sub-list contributing one.
-------------------------------------------------------------------------------------------------


(define list1 (list 1 2 3 4 5))
(define list2 (list 6 7 8 9 0))

(display "List1: ")
(write list1)

(display "List2: ")
(write list2)

(define ap (append list1 list2))
(define con (construct list1 list2))

(display "Appended List1-List2: ")
(display ap)
(display " -Length: ")
(write (length ap))

(display "Constructed List1-List2: ")
(display con)
(display " -Length: ")
(write (length con))
